//================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -------------------------------------------
// - Vv } -
//================================
// *gJA
//================================

prt_in,243,168,4	script	i}	91,{
	if(Sex) {
		mes "[i}]";
		mes "w{. u! zvܪܮt.";
		mes "ݭnMaOi@U...";
		mes "zUa. ְ..";
	}
	else {
		if(rand(2)) {
			mes "[i}]";
			mes "ur! jj! zbF?";
			mes "ݬݱzv! ܪܮt! ڪѰ~";
			mes "jj. zoˤ޷|MI.";
			mes "@浹ڦn? ?";
		}
		else {
			mes "[i}]";
			mes "u!";
			mes "jj~zVYvܯuܥiR,";
			mes "Ӥ߱VYva?";
		}
	}
	next;
	switch (select("VYv.:ԭzV⪺e.:.")) {
	case 1:
		mes "[i}]";
		mes "n~n~Qon~~";
		mes "nS... nܨn|.";
		mes "zn擄C.";
		setarray .@word$,":::::Ŧ:զ:¦";
		setarray .@color,8,1,2,3,4,5,6,7;
		setarray .@itemid,975,976,981,980,979,978,982,983;
		while(1) {
			next;
			set .@j,select("V.:V.:V.:V.:V.:ŦV.:զV.:¦V.:.")-1;
			mes "[i}]";
			mes "zNoC~";
			next;
			if(select("n!:VF!")==2) {
				if(.@dyecount) {
					mes "[i}]";
					mes "na";
					mes "{bC]ZAXA";
				}
				else {
					mes "[i}]";
					mes "w{bCa";
					mes "ܾAXA@";
				}
				close;
			}
			if(Zeny<5000) {
				mes "[i}]";
				mes "";
				close;
			}
			if(countitem(.@itemid[.@j])<1) {
				mes "[i}]";
				mes "AAna" +.@word$[.@j]+ "VƨӰ";
				mes "u" +.@word$[.@j]+ "VơvO";
				close;
			}
			if(getlook(6) == .@color[.@j]) {
				mes "[i}]";
				mes "..";
				mes "z諸CMzYvCO@˪...";
				mes "zn@C.";
				continue;
			}
			set .@dyecount,1;
			set Zeny,Zeny-5000;
			delitem .@itemid[.@j],1;
			setlook 6,.@color[.@j];
			mes "[i}]";
			mes "nF";
			mes "QVLCݬݶ?";
			next;
			if(select("n:n")==2) {
				mes "[i}]";
				mes "~?zunF? Ii....";
				close;
			}
			mes "[i}]";
			mes "nADF";
		}
	case 2:
		mes "[i}]";
		mes "߱nɭ , ʪɭ ,";
		mes "Q˫Ӫɭ. Ϊ̦SOƱɭ";
		mes "bSO, SOŶ,";
		mes "uzWSv. zQģ ?";
		next;
		mes "[Vvvi]";
		mes "pGzۤvV.";
		mes "ޤCⳣiHϱzSӤSXnv";
		mes "ܪR.";
		mes "nOΦO,";
		mes "oRNOo@. ~";
		next;
		mes "[Vvvi]";
		mes "*ԭzOΩMm *";
		mes "- ݭnVƪ~ 1ӡK.";
		mes "-OάO1000.";
		close;
	case 3:
		mes "[i}]";
		mes "ިkkHRꪺvQMq.";
		close;
	}
}